Chapter 2: Answers 4 Jack K. Cohen Colorado School of Mines
LimitTable[(7 - x)/Abs[x - 7], {x, 7, 6, -1}] //TableForm gives:
6. 1. 6.9 1. 6.99 1. 6.999 1. 6.9999 1. 6.99999 1.(This is our implementation of the recent ``Program of the Week". The last two numerical arguments respectively give the number of table entries and the starting point offset from the limit point (so the table starts with 7 - 1 = 6 in the present case).
LimitTable[(4 + x)/Sqrt [(4 + x)^2], {x, -4, 6, -1}] //TableForm -5. -1. -4.1 -1. -4.01 -1. -4.001 -1. -4.0001 -1. -4.00001 -1.